home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 42 / Amiga Format AFCD42 (Issue 126, Aug 1999).iso / -serious- / programming / basic / newcommandset_v1.80 / examples / program 1.bb2 < prev    next >
Unknown  |  1999-05-14  |  3.6 KB
view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% TrID Flexible Line Interpretation bitmap default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 3b 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.; *****|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 00 3b 20 20 |********|****.;  |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000050| 20 4e 65 77 20 43 6f 6d | 6d 61 6e 64 20 53 65 74 | New Com|mand Set|
|00000060| 00 3b 20 20 20 20 43 6f | 64 65 64 20 62 79 20 41 |.;    Co|ded by A|
|00000070| 6c 70 68 61 53 4f 55 4e | 44 20 2d 20 28 63 29 20 |lphaSOUN|D - (c) |
|00000080| 31 39 39 39 20 46 61 6e | 74 61 69 73 69 65 20 73 |1999 Fan|taisie s|
|00000090| 6f 66 74 77 61 72 65 00 | 3b 20 2a 2a 2a 2a 2a 2a |oftware.|; ******|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 00 00 3b 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |***..; *|********|
|000000e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000100| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000110| 00 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.;      |        |
|00000120| 20 20 20 20 20 20 20 46 | 75 6c 6c 20 50 72 6f 67 |       F|ull Prog|
|00000130| 72 61 6d 3a 00 3b 00 3b | 20 20 20 20 43 72 65 61 |ram:.;.;|    Crea|
|00000140| 74 65 20 61 20 63 6f 6f | 6c 20 50 61 6c 65 74 74 |te a coo|l Palett|
|00000150| 65 20 77 69 6e 64 6f 77 | 20 77 69 74 68 20 75 73 |e window| with us|
|00000160| 69 6e 67 20 4e 43 53 20 | 63 6f 6d 6d 61 6e 64 73 |ing NCS |commands|
|00000170| 2e 00 3b 00 3b 20 46 65 | 61 74 75 72 65 73 3a 00 |..;.; Fe|atures:.|
|00000180| 3b 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 00 3b 00 3b 20 |; ------|---.;.; |
|00000190| 2b 20 52 65 61 6c 74 69 | 6d 65 20 63 6f 6c 6f 75 |+ Realti|me colou|
|000001a0| 72 20 63 68 61 6e 67 69 | 6e 67 20 77 68 65 6e 20 |r changi|ng when |
|000001b0| 75 73 69 6e 67 20 73 6c | 69 64 65 72 73 2e 00 3b |using sl|iders..;|
|000001c0| 20 2b 20 42 6f 72 64 65 | 72 73 65 6e 73 69 74 69 | + Borde|rsensiti|
|000001d0| 76 65 20 77 69 6e 64 6f | 77 20 26 20 63 6f 6e 74 |ve windo|w & cont|
|000001e0| 65 6e 74 2e 20 59 6f 75 | 72 20 77 69 6e 64 6f 77 |ent. You|r window|
|000001f0| 20 62 6f 72 64 65 72 73 | 00 3b 20 20 20 63 61 6e | borders|.;   can|
|00000200| 20 62 65 20 61 73 20 62 | 69 67 20 61 73 20 79 6f | be as b|ig as yo|
|00000210| 75 20 77 61 6e 74 20 28 | 56 69 73 75 61 6c 50 72 |u want (|VisualPr|
|00000220| 65 66 73 20 72 75 6c 65 | 7a 7a 7a 20 21 29 00 3b |efs rule|zzz !).;|
|00000230| 00 3b 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.; *****|********|
|00000240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000250| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000260| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 00 3b 00 3b |********|****.;.;|
|00000270| 20 31 37 2f 30 34 2f 31 | 39 39 39 00 3b 20 20 20 | 17/04/1|999.;   |
|00000280| 41 64 64 65 64 20 62 6f | 72 64 65 72 20 73 65 6e |Added bo|rder sen|
|00000290| 73 69 74 69 76 69 74 79 | 00 3b 00 00 80 c3 00 00 |sitivity|.;......|
|000002a0| d4 8c 20 30 00 d4 15 20 | 30 00 d9 9e 20 30 00 c5 |.. 0... |0... 0..|
|000002b0| 8c 20 31 00 54 61 67 4c | 69 73 74 2e 6c 20 3d 20 |. 1.TagL|ist.l = |
|000002c0| ca 81 28 31 30 29 00 00 | 80 33 20 2e 6c 20 72 2c |..(10)..|.3 .l r,|
|000002d0| 20 67 2c 20 62 2c 20 49 | 44 43 4d 50 00 00 d4 82 | g, b, I|DCMP....|
|000002e0| 20 30 2c 20 22 22 20 20 | 20 20 20 20 20 20 20 20 | 0, ""  |        |
|000002f0| 20 20 20 20 20 3b 20 46 | 6f 75 6e 64 20 74 68 65 |     ; F|ound the|
|00000300| 20 64 65 66 61 75 6c 20 | 70 75 62 6c 69 63 20 73 | defaul |public s|
|00000310| 63 72 65 65 6e 00 00 48 | 46 6f 6e 74 20 3d 20 d4 |creen..H|Font = .|
|00000320| 97 00 00 48 46 33 20 20 | 20 3d 20 48 46 6f 6e 74 |...HF3  | = HFont|
|00000330| 2b 33 00 00 c5 87 20 30 | 2c 20 d4 8d 20 20 3b 20 |+3.... 0|, ..  ; |
|00000340| 47 65 74 20 74 68 65 20 | 6f 72 69 67 69 6e 61 6c |Get the |original|
|00000350| 20 53 63 72 65 65 6e 20 | 50 61 6c 65 74 74 65 00 | Screen |Palette.|
|00000360| c5 87 20 31 2c 20 d4 8d | 20 20 3b 00 00 3b 00 3b |.. 1, ..|  ;..;.;|
|00000370| 20 4e 6f 77 2c 20 63 72 | 65 61 74 65 20 61 6c 6c | Now, cr|eate all|
|00000380| 20 74 68 65 20 77 69 6e | 64 6f 77 73 20 67 61 64 | the win|dows gad|
|00000390| 67 65 74 73 00 3b 00 3b | 20 4e 6f 74 65 3a 20 54 |gets.;.;| Note: T|
|000003a0| 68 69 73 20 6d 65 74 68 | 6f 64 20 64 65 6d 6f 6e |his meth|od demon|
|000003b0| 73 74 72 61 74 65 20 68 | 6f 77 20 64 6f 20 65 61 |strate h|ow do ea|
|000003c0| 73 65 6c 79 20 61 6e 20 | 65 66 66 69 63 69 65 6e |sely an |efficien|
|000003d0| 74 00 3b 20 20 20 20 20 | 20 20 66 6f 6e 74 20 73 |t.;     |  font s|
|000003e0| 65 6e 73 69 74 69 76 65 | 20 69 6e 74 65 72 66 61 |ensitive| interfa|
|000003f0| 63 65 2e 00 3b 20 20 20 | 20 20 20 20 27 48 27 20 |ce..;   |    'H' |
|00000400| 69 73 20 75 73 65 64 20 | 62 79 20 74 68 65 20 67 |is used |by the g|
|00000410| 61 64 67 65 74 73 20 61 | 73 20 27 64 65 66 61 75 |adgets a|s 'defau|
|00000420| 6c 74 20 59 20 63 6f 6f | 72 64 69 6e 61 74 65 27 |lt Y coo|rdinate'|
|00000430| 00 3b 20 20 20 20 20 20 | 20 27 57 27 20 69 73 20 |.;      | 'W' is |
|00000440| 20 22 20 20 20 20 20 20 | 20 20 22 20 20 20 20 20 | "      |  "     |
|00000450| 20 20 20 20 20 20 20 20 | 20 20 20 22 20 20 20 20 |        |   "    |
|00000460| 58 20 20 20 20 22 00 3b | 00 00 57 69 6e 57 20 3d |X    ".;|..WinW =|
|00000470| 20 33 34 35 00 00 80 0b | 20 d9 92 28 30 2c 20 d4 | 345....| ..(0, .|
|00000480| 8d 29 00 20 20 48 20 3d | 20 48 46 6f 6e 74 00 20 |.).  H =| HFont. |
|00000490| 20 58 20 3d 20 d4 94 00 | 00 20 20 ca 84 20 23 47 | X = ...|.  .. #G|
|000004a0| 54 50 41 5f 44 65 70 74 | 68 2c 20 33 00 20 20 20 |TPA_Dept|h, 3.   |
|000004b0| 20 20 20 20 20 ca 83 20 | 23 47 54 50 41 5f 49 6e |     .. |#GTPA_In|
|000004c0| 64 69 63 61 74 6f 72 48 | 65 69 67 68 74 2c 20 30 |dicatorH|eight, 0|
|000004d0| 00 20 20 20 20 20 20 20 | 20 ca 83 20 23 47 54 50 |.       | .. #GTP|
|000004e0| 41 5f 43 6f 6c 6f 72 4f | 66 66 73 65 74 2c 20 30 |A_ColorO|ffset, 0|
|000004f0| 00 20 20 20 20 20 20 20 | 20 ca 83 20 23 47 54 50 |.       | .. #GTP|
|00000500| 41 5f 43 6f 6c 6f 72 2c | 20 30 00 20 20 d9 87 20 |A_Color,| 0.  .. |
|00000510| 31 2c 20 58 2b 38 2c 20 | 48 2b 31 30 2c 20 33 33 |1, X+8, |H+10, 33|
|00000520| 30 2c 20 32 35 2c 20 22 | 22 2c 20 54 61 67 4c 69 |0, 25, "|", TagLi|
|00000530| 73 74 20 3a 20 48 2b 34 | 32 00 00 20 20 72 24 20 |st : H+4|2..  r$ |
|00000540| 3d 20 22 52 3a 20 25 32 | 6c 64 22 00 20 20 ca 84 |= "R: %2|ld".  ..|
|00000550| 20 23 47 54 53 4c 5f 4d | 69 6e 2c 20 30 00 20 20 | #GTSL_M|in, 0.  |
|00000560| 20 20 20 20 20 20 ca 83 | 20 23 47 54 53 4c 5f 4d |      ..| #GTSL_M|
|00000570| 61 78 2c 20 32 35 35 00 | 20 20 20 20 20 20 20 20 |ax, 255.|        |
|00000580| ca 83 20 23 47 54 53 4c | 5f 4c 65 76 65 6c 2c 20 |.. #GTSL|_Level, |
|00000590| 73 6c 69 64 65 72 6c 65 | 76 65 6c 00 20 20 20 20 |sliderle|vel.    |
|000005a0| 20 20 20 20 ca 83 20 23 | 47 54 53 4c 5f 4c 65 76 |    .. #|GTSL_Lev|
|000005b0| 65 6c 46 6f 72 6d 61 74 | 2c 20 26 72 24 00 20 20 |elFormat|, &r$.  |
|000005c0| 20 20 20 20 20 20 ca 83 | 20 23 47 54 53 4c 5f 4c |      ..| #GTSL_L|
|000005d0| 65 76 65 6c 50 6c 61 63 | 65 2c 20 23 50 4c 41 43 |evelPlac|e, #PLAC|
|000005e0| 45 54 45 58 54 5f 52 49 | 47 48 54 00 20 20 20 20 |ETEXT_RI|GHT.    |
|000005f0| 20 20 20 20 ca 83 20 23 | 47 54 53 4c 5f 4d 61 78 |    .. #|GTSL_Max|
|00000600| 4c 65 76 65 6c 4c 65 6e | 2c 20 36 00 20 20 20 20 |LevelLen|, 6.    |
|00000610| 20 20 20 20 ca 83 20 23 | 47 41 5f 49 6d 6d 65 64 |    .. #|GA_Immed|
|00000620| 69 61 74 65 2c 20 31 00 | 20 20 d9 89 20 32 2c 20 |iate, 1.|  .. 2, |
|00000630| 58 2b 38 2c 20 48 2c 20 | 57 69 6e 57 2d 37 35 2c |X+8, H, |WinW-75,|
|00000640| 20 48 46 33 2c 20 22 22 | 2c 20 54 61 67 4c 69 73 | HF3, ""|, TagLis|
|00000650| 74 20 3a 20 48 2b 48 46 | 33 00 00 20 20 67 24 20 |t : H+HF|3..  g$ |
|00000660| 3d 20 22 47 3a 20 25 32 | 6c 64 22 00 20 20 ca 86 |= "G: %2|ld".  ..|
|00000670| 20 33 2c 20 23 47 54 53 | 4c 5f 4c 65 76 65 6c 46 | 3, #GTS|L_LevelF|
|00000680| 6f 72 6d 61 74 2c 20 26 | 67 24 00 20 20 d9 89 20 |ormat, &|g$.  .. |
|00000690| 33 2c 20 58 2b 38 2c 20 | 48 2c 20 57 69 6e 57 2d |3, X+8, |H, WinW-|
|000006a0| 37 35 2c 20 48 46 33 2c | 20 22 22 2c 20 54 61 67 |75, HF3,| "", Tag|
|000006b0| 4c 69 73 74 20 3a 20 48 | 2b 48 46 33 00 00 20 20 |List : H|+HF3..  |
|000006c0| 62 24 20 3d 20 22 42 3a | 20 25 32 6c 64 22 00 20 |b$ = "B:| %2ld". |
|000006d0| 20 ca 86 20 33 2c 20 23 | 47 54 53 4c 5f 4c 65 76 | .. 3, #|GTSL_Lev|
|000006e0| 65 6c 46 6f 72 6d 61 74 | 2c 20 26 62 24 00 20 20 |elFormat|, &b$.  |
|000006f0| d9 89 20 34 2c 20 58 2b | 38 2c 20 48 2c 20 57 69 |.. 4, X+|8, H, Wi|
|00000700| 6e 57 2d 37 35 2c 20 48 | 46 33 2c 20 22 22 2c 20 |nW-75, H|F3, "", |
|00000710| 54 61 67 4c 69 73 74 20 | 3a 20 48 2b 48 46 33 2b |TagList |: H+HF3+|
|00000720| 31 33 00 00 20 20 d9 81 | 20 35 2c 20 58 2b 38 2c |13..  ..| 5, X+8,|
|00000730| 20 48 2c 20 31 30 30 2c | 20 48 46 33 2b 32 2c 20 | H, 100,| HF3+2, |
|00000740| 22 4f 6b 22 2c 20 30 00 | 20 20 d9 81 20 36 2c 20 |"Ok", 0.|  .. 6, |
|00000750| 58 2b 32 33 34 2c 20 48 | 2c 20 31 30 30 2c 20 48 |X+234, H|, 100, H|
|00000760| 46 33 2b 32 2c 20 22 43 | 61 6e 63 65 6c 22 2c 20 |F3+2, "C|ancel", |
|00000770| 30 00 20 20 d9 81 20 37 | 2c 20 58 2b 31 32 31 2c |0.  .. 7|, X+121,|
|00000780| 20 48 2c 20 31 30 30 2c | 20 48 46 33 2b 32 2c 20 | H, 100,| HF3+2, |
|00000790| 22 55 6e 64 6f 22 2c 20 | 30 00 00 20 20 57 69 6e |"Undo", |0..  Win|
|000007a0| 48 20 3d 20 48 2b 31 30 | 00 80 c0 00 00 00 3b 20 |H = H+10|......; |
|000007b0| 4f 75 72 20 77 69 6e 64 | 6f 77 20 74 69 74 6c 65 |Our wind|ow title|
|000007c0| 2e 20 52 65 6d 65 6d 62 | 65 72 20 69 74 20 73 68 |. Rememb|er it sh|
|000007d0| 6f 75 6c 64 6e 27 74 20 | 61 6c 74 65 72 65 64 20 |ouldn't |altered |
|000007e0| 77 68 69 6c 65 20 74 68 | 65 00 3b 20 77 69 6e 64 |while th|e.; wind|
|000007f0| 6f 77 20 69 73 20 6f 70 | 65 6e 65 64 20 21 00 3b |ow is op|ened !.;|
|00000800| 00 57 69 6e 54 69 74 6c | 65 24 20 3d 20 22 50 61 |.WinTitl|e$ = "Pa|
|00000810| 6c 65 74 74 65 20 52 65 | 71 75 65 73 74 65 72 20 |lette Re|quester |
|00000820| 56 31 2e 30 32 22 00 00 | ca 83 20 23 57 41 5f 54 |V1.02"..|.. #WA_T|
|00000830| 69 74 6c 65 2c 20 26 57 | 69 6e 54 69 74 6c 65 24 |itle, &W|inTitle$|
|00000840| 00 ca 83 20 23 57 41 5f | 46 6c 61 67 73 2c 20 23 |... #WA_|Flags, #|
|00000850| 57 46 4c 47 5f 43 4c 4f | 53 45 47 41 44 47 45 54 |WFLG_CLO|SEGADGET|
|00000860| 20 7c 20 23 57 46 4c 47 | 5f 44 52 41 47 42 41 52 | | #WFLG|_DRAGBAR|
|00000870| 20 7c 20 23 57 46 4c 47 | 5f 44 45 50 54 48 47 41 | | #WFLG|_DEPTHGA|
|00000880| 44 47 45 54 20 7c 20 23 | 57 46 4c 47 5f 41 43 54 |DGET | #|WFLG_ACT|
|00000890| 49 56 41 54 45 00 ca 83 | 20 23 57 41 5f 49 44 43 |IVATE...| #WA_IDC|
|000008a0| 4d 50 2c 20 23 49 44 43 | 4d 50 5f 43 4c 4f 53 45 |MP, #IDC|MP_CLOSE|
|000008b0| 57 49 4e 44 4f 57 20 7c | 20 23 49 44 43 4d 50 5f |WINDOW || #IDCMP_|
|000008c0| 47 41 44 47 45 54 55 50 | 7c 20 23 49 44 43 4d 50 |GADGETUP|| #IDCMP|
|000008d0| 5f 47 41 44 47 45 54 44 | 4f 57 4e 20 7c 20 23 49 |_GADGETD|OWN | #I|
|000008e0| 44 43 4d 50 5f 4d 4f 55 | 53 45 4d 4f 56 45 00 ca |DCMP_MOU|SEMOVE..|
|000008f0| 83 20 23 57 41 5f 43 75 | 73 74 6f 6d 53 63 72 65 |. #WA_Cu|stomScre|
|00000900| 65 6e 2c 20 d4 8d 00 00 | 80 0b 20 d4 01 28 30 2c |en, ....|.. ..(0,|
|00000910| 20 30 2c 20 48 46 33 2c | 20 57 69 6e 57 2c 20 57 | 0, HF3,| WinW, W|
|00000920| 69 6e 48 2c 20 54 61 67 | 4c 69 73 74 29 00 00 20 |inH, Tag|List).. |
|00000930| 20 d9 93 20 30 2c 20 d4 | 16 00 00 20 20 80 06 20 | .. 0, .|...  .. |
|00000940| 52 65 66 72 65 73 68 50 | 61 6c 65 74 74 65 00 00 |RefreshP|alette..|
|00000950| 20 20 80 bb 00 00 20 20 | 20 20 49 44 43 4d 50 20 |  ....  |  IDCMP |
|00000960| 3d 20 d4 04 00 00 20 20 | 20 20 45 76 65 6e 74 49 |= ....  |  EventI|
|00000970| 44 20 3d 20 d4 19 20 20 | 20 20 3b 20 47 65 74 20 |D = ..  |  ; Get |
|00000980| 69 74 27 73 20 49 44 2e | 00 20 20 20 20 43 6f 64 |it's ID.|.    Cod|
|00000990| 65 20 20 20 20 3d 20 d4 | 18 20 20 3b 20 47 65 74 |e    = .|.  ; Get|
|000009a0| 20 74 68 65 20 63 6f 64 | 65 20 76 61 6c 75 65 2e | the cod|e value.|
|000009b0| 00 00 20 20 20 20 80 0b | 20 49 44 43 4d 50 20 3d |..    ..| IDCMP =|
|000009c0| 20 23 49 44 43 4d 50 5f | 47 41 44 47 45 54 55 50 | #IDCMP_|GADGETUP|
|000009d0| 20 80 8a 20 49 44 43 4d | 50 20 3d 20 23 49 44 43 | .. IDCM|P = #IDC|
|000009e0| 4d 50 5f 47 41 44 47 45 | 54 44 4f 57 4e 20 3b 20 |MP_GADGE|TDOWN ; |
|000009f0| 41 20 67 61 64 67 65 74 | 20 68 61 73 20 62 65 65 |A gadget| has bee|
|00000a00| 6e 20 70 75 73 68 65 64 | 00 00 20 20 20 20 20 20 |n pushed|..      |
|00000a10| 53 6c 69 64 65 72 49 44 | 20 3d 20 45 76 65 6e 74 |SliderID| = Event|
|00000a20| 49 44 00 00 20 20 20 20 | 20 20 80 0e 20 45 76 65 |ID..    |  .. Eve|
|00000a30| 6e 74 49 44 00 20 20 20 | 20 20 20 20 20 80 0f 20 |ntID.   |     .. |
|00000a40| 31 00 20 20 20 20 20 20 | 20 20 20 20 50 61 6c 65 |1.      |    Pale|
|00000a50| 74 74 65 49 6e 64 65 78 | 20 3d 20 43 6f 64 65 00 |tteIndex| = Code.|
|00000a60| 20 20 20 20 20 20 20 20 | 20 20 80 06 20 52 65 66 |        |  .. Ref|
|00000a70| 72 65 73 68 50 61 6c 65 | 74 74 65 00 00 20 20 20 |reshPale|tte..   |
|00000a80| 20 20 20 20 20 80 0f 20 | 35 20 20 20 20 20 20 20 |     .. |5       |
|00000a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000aa0| 20 20 3b 20 4f 6b 00 20 | 20 20 20 20 20 20 20 20 |  ; Ok. |        |
|00000ab0| 20 49 44 43 4d 50 20 3d | 20 23 49 44 43 4d 50 5f | IDCMP =| #IDCMP_|
|00000ac0| 43 4c 4f 53 45 57 49 4e | 44 4f 57 00 00 20 20 20 |CLOSEWIN|DOW..   |
|00000ad0| 20 20 20 20 20 80 0f 20 | 36 20 20 20 20 20 20 20 |     .. |6       |
|00000ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000af0| 20 20 3b 20 43 61 6e 63 | 65 6c 00 20 20 20 20 20 |  ; Canc|el.     |
|00000b00| 20 20 20 20 20 c5 83 20 | 30 2c 20 d4 8d 20 3b 20 |     .. |0, .. ; |
|00000b10| 52 65 73 74 6f 72 65 20 | 6f 72 69 67 69 6e 61 6c |Restore |original|
|00000b20| 20 70 61 6c 65 74 74 65 | 00 20 20 20 20 20 20 20 | palette|.       |
|00000b30| 20 20 20 49 44 43 4d 50 | 20 3d 20 23 49 44 43 4d |   IDCMP| = #IDCM|
|00000b40| 50 5f 43 4c 4f 53 45 57 | 49 4e 44 4f 57 00 00 20 |P_CLOSEW|INDOW.. |
|00000b50| 20 20 20 20 20 20 20 80 | 0f 20 37 20 20 20 20 20 |       .|. 7     |
|00000b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000b70| 20 20 20 20 3b 20 55 6e | 64 6f 00 20 20 20 20 20 |    ; Un|do.     |
|00000b80| 20 20 20 20 20 c5 83 20 | 30 2c 20 d4 8d 20 3b 20 |     .. |0, .. ; |
|00000b90| 52 65 73 74 6f 72 65 20 | 6f 72 69 67 69 6e 61 6c |Restore |original|
|00000ba0| 20 70 61 6c 65 74 74 65 | 00 20 20 20 20 20 20 20 | palette|.       |
|00000bb0| 20 20 20 80 06 20 52 65 | 66 72 65 73 68 50 61 6c |   .. Re|freshPal|
|00000bc0| 65 74 74 65 00 00 20 20 | 20 20 20 20 80 02 20 80 |ette..  |    .. .|
|00000bd0| 0e 00 20 20 20 20 80 c0 | 00 00 00 20 20 20 20 80 |..    ..|...    .|
|00000be0| 0b 20 49 44 43 4d 50 20 | 3d 20 23 49 44 43 4d 50 |. IDCMP |= #IDCMP|
|00000bf0| 5f 4d 4f 55 53 45 4d 4f | 56 45 00 20 20 20 20 20 |_MOUSEMO|VE.     |
|00000c00| 20 80 0b 20 53 6c 69 64 | 65 72 49 44 3e 31 20 80 | .. Slid|erID>1 .|
|00000c10| 42 20 53 6c 69 64 65 72 | 49 44 3c 35 00 20 20 20 |B Slider|ID<5.   |
|00000c20| 20 20 20 20 20 80 0e 20 | 53 6c 69 64 65 72 49 44 |     .. |SliderID|
|00000c30| 00 20 20 20 20 20 20 20 | 20 20 20 80 0f 20 32 00 |.       |   .. 2.|
|00000c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 72 20 3d 20 |        |    r = |
|00000c50| 43 6f 64 65 00 00 20 20 | 20 20 20 20 20 20 20 20 |Code..  |        |
|00000c60| 80 0f 20 33 00 20 20 20 | 20 20 20 20 20 20 20 20 |.. 3.   |        |
|00000c70| 20 67 20 3d 20 43 6f 64 | 65 00 00 20 20 20 20 20 | g = Cod|e..     |
|00000c80| 20 20 20 20 20 80 0f 20 | 34 00 20 20 20 20 20 20 |     .. |4.      |
|00000c90| 20 20 20 20 20 20 62 20 | 3d 20 43 6f 64 65 00 00 |      b |= Code..|
|00000ca0| 20 20 20 20 20 20 20 20 | 80 02 20 80 0e 00 00 20 |        |.. .... |
|00000cb0| 20 20 20 20 20 20 20 c5 | 89 20 20 20 20 d4 8d 2c |       .|.    ..,|
|00000cc0| 20 50 61 6c 65 74 74 65 | 49 6e 64 65 78 2c 20 72 | Palette|Index, r|
|00000cd0| 2c 20 67 2c 20 62 20 20 | 3b 20 55 70 64 61 74 65 |, g, b  |; Update|
|00000ce0| 20 53 63 72 65 65 6e 20 | 63 6f 6c 6f 75 72 73 20 | Screen |colours |
|00000cf0| 61 6e 64 00 20 20 20 20 | 20 20 20 20 c5 82 20 50 |and.    |    .. P|
|00000d00| 61 6c 65 74 74 65 49 6e | 64 65 78 2c 20 72 2c 20 |aletteIn|dex, r, |
|00000d10| 67 2c 20 62 20 20 20 20 | 20 20 20 20 20 20 20 20 |g, b    |        |
|00000d20| 20 3b 20 6f 75 72 20 62 | 75 66 66 65 72 20 70 61 | ; our b|uffer pa|
|00000d30| 6c 65 74 74 65 20 63 6f | 6c 6f 75 72 73 00 20 20 |lette co|lours.  |
|00000d40| 20 20 20 20 80 c0 00 20 | 20 20 20 80 c0 00 00 20 |    ... |   .... |
|00000d50| 20 80 bc 20 49 44 43 4d | 50 20 3d 20 23 49 44 43 | .. IDCM|P = #IDC|
|00000d60| 4d 50 5f 43 4c 4f 53 45 | 57 49 4e 44 4f 57 00 80 |MP_CLOSE|WINDOW..|
|00000d70| c0 00 00 80 02 00 00 00 | 52 65 66 72 65 73 68 50 |........|RefreshP|
|00000d80| 61 6c 65 74 74 65 3a 00 | 20 20 72 20 3d 20 c5 84 |alette:.|  r = ..|
|00000d90| 20 20 28 50 61 6c 65 74 | 74 65 49 6e 64 65 78 29 |  (Palet|teIndex)|
|00000da0| 20 20 20 20 20 20 20 20 | 20 3b 20 47 65 74 20 69 |        | ; Get i|
|00000db0| 6e 66 6f 72 6d 61 74 69 | 6f 6e 20 66 72 6f 6d 20 |nformati|on from |
|00000dc0| 63 75 72 72 65 6e 74 20 | 70 61 6c 65 74 74 65 00 |current |palette.|
|00000dd0| 20 20 67 20 3d 20 c5 85 | 28 50 61 6c 65 74 74 65 |  g = ..|(Palette|
|00000de0| 49 6e 64 65 78 29 20 20 | 20 20 20 20 20 20 20 3b |Index)  |       ;|
|00000df0| 00 20 20 62 20 3d 20 c5 | 86 20 28 50 61 6c 65 74 |.  b = .|. (Palet|
|00000e00| 74 65 49 6e 64 65 78 29 | 20 20 20 20 20 20 20 20 |teIndex)|        |
|00000e10| 20 3b 00 00 20 20 d9 8e | 20 32 2c 20 23 47 54 53 | ;..  ..| 2, #GTS|
|00000e20| 4c 5f 4c 65 76 65 6c 2c | 20 72 20 20 20 3b 20 55 |L_Level,| r   ; U|
|00000e30| 70 64 61 74 65 20 73 6c | 69 64 65 72 73 2e 2e 00 |pdate sl|iders...|
|00000e40| 20 20 d9 8e 20 33 2c 20 | 23 47 54 53 4c 5f 4c 65 |  .. 3, |#GTSL_Le|
|00000e50| 76 65 6c 2c 20 67 20 20 | 20 3b 00 20 20 d9 8e 20 |vel, g  | ;.  .. |
|00000e60| 34 2c 20 23 47 54 53 4c | 5f 4c 65 76 65 6c 2c 20 |4, #GTSL|_Level, |
|00000e70| 62 20 20 20 3b 00 80 07 | 00                      |b   ;...|.       |
+--------+-------------------------+-------------------------+--------+--------+